home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The PC-SIG Library 10
/
The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso
/
PC_SIGCD
/
11
/
0
/
DISK1105.ZIP
/
DATA
/
P1984-01.IN
< prev
next >
Wrap
Text File
|
1988-06-01
|
6KB
|
133 lines
'**********************************************************
'
' A.B.C. Chemical Company
'
'**********************************************************
' plant 1 processes
'..........................................................
PROCESS @10=d10 & d30 prod. plt 1
USE #100/crude oil (m bbls) =1.0
#10/plt 1 production days =0.033333
#11/plt 1 operating cost =2000.
MAKE #210/d10 production plt 1 =0.1
#230/d30 production plt 1 =0.1
#51/byproduct 1 =0.04
#52/byproduct 2 =0.1;
PROCESS @11=d10 & d60 prod. plt 1
USE #100=1.0, #10=0.033333, #11=2000.
MAKE #210=0.1
#260/d60 production plt 1 =0.1
#51=0.04, #52=0.1;
PROCESS @12=d30 & d60 prod. plt 1
USE #100=1.0, #10=0.033333, #11=2000.
MAKE #230=0.1, #260=0.1
#51=0.04, #52=0.1;
'..........................................................
' operational constraints total days = 30
'..........................................................
MAXIMUM #10=30.;
' holding tanks: after plant 1
PROCESS @15=holding tanks: after plt 1
POOL #410/tank d10 final inv.
FROM #210,#411/tank d10 initial inv.
TO #310/d10 to plt 2;
POOL #430/tank d30 final inv.
FROM #230,#431/tank d30 initial inv.
TO #330/d30 to plt 2;
POOL #460/tank d60 final inv.
FROM #260,#461/tank d60 initial inv.
TO #360/d60 to plt 2;
'.............................................................
' set the tank limits and specify tank contents (inventory)
MAXIMUM #410 = 80., #430 = 80., #460 = 80.;
FIXED #411 = 0.0, #431 = 0.0, #461 = 0.0;
'..........................................................
' plant 2 processes
'..........................................................
PROCESS @20=m10 production plt 2
USE #310=1.0
#20/plt 2 production days =0.166667
#21=plt 2 operating cost =600.
MAKE #510/m10 production plt 2 =0.62
#53/byproduct 3 =0.38;
PROCESS @21=m30 production plt 2
USE #330=1.0
#20=0.166667
#21=600.
MAKE #530/m30 production plt 2 =0.45
#53=0.55;
PROCESS @22=m60 production plt 2
USE #360=1.0
#20=0.192307
#21=600.
MAKE #560/m60 production plt 2 =0.39
#53=0.61;
'..........................................................
' operational constraints total days = 30
'..........................................................
MAXIMUM #20=30.;
' holding tanks: after plant 2
PROCESS @25=holding tanks: after plt 2
POOL #610/tank m10 final inv.
FROM #510,#611/tank m10 initial inv.
TO #710/m10 total production;
POOL #630/tank m30 final inv.
FROM #530,#631/tank m30 initial inv.
TO #730/m30 total production;
POOL #660/tank m60 final inv.
FROM #560,#661/tank m60 initial inv.
TO #760/m60 total production;
'.............................................................
' set the tank limits and specify tank contents (inventory)
MAXIMUM #610 = 25., #630 = 25., #660 = 25.;
FIXED #611 = 0.0, #631 = 0.0, #661= 0.0;
'..........................................................
' demands on production
LIMITS #710=20. : 35. '..refined product M10
#730=20. : 35. '..refined product M30
#760=10. : 30.; '..refined product M60
'.........................................................
' limit the amount of crude oil
FIXED #100=900.;
'.........................................................
' prices
PRICES #100=-25000. '...crude oil
#11=-1.0 '...Plant 1 operating cost
#21=-1.0 '...Plant 2 operating cost
#51=12000. '...byproduct 1 SOLD
#52=22000. '...byproduct 2 SOLD
#53=22000.; '...byproduct 3 SOLD
'.........................................................
#53=22000.; '...byproduct 3